﻿Public Class BEpersonal
#Region "Declaración de variables"

    Private codPersonal As Integer
    Private codUsuario As Integer
    Private nombre As String
    Private apePaterno As String
    Private apeMaterno As String
    Private telefono As Integer
    Private fecIngreso As Date
    Private direccion As String
    Private distrito As String
    Private provincia As String

#End Region

    Sub New()
    End Sub

    Sub New(ByVal pCodPersonal As Object, _
            ByVal pCodUsuario As Object, _
            ByVal pNombre As Object, _
            ByVal pApePaterno As Object, _
            ByVal pApeMaterno As Object, _
            ByVal pTelefono As Object, _
            ByVal pFecIngreso As Object, _
            ByVal pDireccion As Object, _
            ByVal pDistrito As Object, _
            ByVal pProvincia As Object)

        Me._codPersonal = pCodPersonal
        Me._codUsuario = pCodUsuario
        Me._nombre = pNombre
        Me.apePaterno = pApePaterno
        Me._apeMaterno = pApeMaterno
        Me._telefono = pTelefono
        Me._fecIngreso = pFecIngreso
        Me._direccion = pDireccion
        Me._distrito = pDistrito
        Me._provincia = pProvincia

    End Sub

    Public Property _codPersonal() As Integer
        Get
            Return Me.codPersonal
        End Get
        Set(ByVal value As Integer)
            Me.codPersonal = value
        End Set
    End Property

    Public Property _codUsuario() As Integer
        Get
            Return Me.codUsuario
        End Get
        Set(ByVal value As Integer)
            Me.codUsuario = value
        End Set
    End Property

    Public Property _nombre() As String
        Get
            Return Me.nombre
        End Get
        Set(ByVal value As String)
            Me.nombre = value
        End Set
    End Property

    Public Property _apePaterno() As String
        Get
            Return Me.apePaterno
        End Get
        Set(ByVal value As String)
            Me.apePaterno = value
        End Set
    End Property

    Public Property _apeMaterno() As String
        Get
            Return Me.apeMaterno
        End Get
        Set(ByVal value As String)
            Me.apeMaterno = value
        End Set
    End Property

    Public Property _telefono() As Integer
        Get
            Return Me.telefono
        End Get
        Set(ByVal value As Integer)
            Me.telefono = value
        End Set
    End Property

    Public Property _fecIngreso() As Date
        Get
            Return Me.fecIngreso
        End Get
        Set(ByVal value As Date)
            Me.fecIngreso = value
        End Set
    End Property

    Public Property _direccion() As String
        Get
            Return Me.direccion
        End Get
        Set(ByVal value As String)
            Me.direccion = value
        End Set
    End Property

    Public Property _distrito() As String
        Get
            Return Me.distrito
        End Get
        Set(ByVal value As String)
            Me.distrito = value
        End Set
    End Property

    Public Property _provincia() As String
        Get
            Return Me.provincia
        End Get
        Set(ByVal value As String)
            Me.provincia = value
        End Set
    End Property
End Class
